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RK&G DEC/Xll SYSTEM EXERCISER MODULE 
XRKAGO.Pll 12-QCT-78 lltOl 



MftCYll 30^(1052) 12-OCT-78 16S5B PIGE 5 



OQOgOO' 
000000' 



El 



lOMODX < 

MODULE 1 

.TITLE RKftG DSC. . 

DDXCOM VERSION 6 



M^'MmiMeAiKMii:^^^ 



#RK&G /i 
EC/Xll SY 



240 

oooSii 



z^y ^512.,||BUF] 

TEM iKER6T§E6 fioDULr 
23-MAV-78 
•1ST BIN 



'MV.h 



.1 



»«r******5»*******»**«** 



ft************ 



?«Sg8?P{!" ^nig^!?!"?!??? """"^ 




000252' 



BEGIN? 

MODNAM! 

KFLAG: 

iBTdR: 

BRls 

BR2: 

SR2: 
SR3: 
SR4s 

• ******■! 

STAT: 

pit: 

SPOINT: 

pascnt: 
icont: 

TCOIJNTS 

sofcnt: 
hrdcnt: 
sofpas: 
hrdpas: 



.RSCII /rkag / 
.BYTF OPEN 
10+0 



PRTY5 
PRTYO 



• BYTE 

OPEN 
OPEN 
OPEN 
OPEN 
************ 





;module name. 

JlfSED TO KEEP TRACK OF MBUFF USAGE 



1. 



jiST BR LEVEL. 
j2ND RR LEVEL. 

J SWITCH REGISTER 2 
JSWITCH REGISTER 3 

***************************** 



t**************** 



?STATUS 
J MODULE 



WORD. 
START ADDR. 




512. 



RE Si: 
RES2: 
SVRO: 

SVRI: 
SVR2: 
SVR3: 
SVR4: 
SVR5: 
SVR6: 
CSRA: 
sbadr: 

ACSR: 
WASADR: 

astat: 
errtyp: 



OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 

OPEN 



awaI: open 






rstrt: restrt 




wdto: open 




wdfr: open 




intr: open 




idnum: 5 




MACYil 30A(1052) 12-0CT-78 


16:5 


rbufva: pufin 


? 


RBUPPA: open 

RBUFEA: OPEN 
RBufSz: 256. 


} 


y 


} 


WBUFPA: OPEN 


; 


wbufea: open 


; 


W8UFR0: 1024. 


; 


wHUFSz: open 


; 


cderct: open 


: 


cdwdct: open 


J 


FREE: OPEN 


; 


.rept spsiz 


; 


■Mr 




.list 




.endr 





modsp: 

J ***«****«******************< 



;M00ULE STACK POINTER. 

;PASS COUNTER. 

?» OF ITERATIONS PER PASS=512. 

?LOC TO COUNT ITERATIONS 

JLOC TO SAVE TOTAL SOFT ERRORS 

?LOC TO SAVE TOTAL HARD ERRORS 

?LOC TO SAVE SOFT ERRORS PER PASS 

;LOC TO SAVE HARD ERRORS PER PASS 

;« OF SYS ERRORS ACCUMULATED 

yHOLDS RANDOM » WHEN RAND MACRO IS CALLED 

^RESERVED FOR MONITOR USE 

JRESERVED FOR MONITOR USE 

;RESERVED FOR MONITOR USE 

JLOC TO SAVE RO. 

?LOC TO SAVE Rl. 

;LOC TO SAVE R2. 

?LOC TO SAVE R3. 

?LOC TO SAVE R4. 

?LOC TO SAVE R5. 

;LOC TO SAVE R6. 

;ADDR OF CURRENT CSR. 

JADDR OF GOOD DATA, OR 

;CONTENTS OF CSR. 

;ADDR OF BAD DATA/ OR 

JSTATUS REG CONTENTS. 

JTYPE OF ERROR 

;EXPECTED DATA. 

;ACTUAL DATA. 

JRESTART ADDRESS AFTER END OF PASS 

?»ORDS TO MEMORY PER ITERATION 

?WORDS FROM MEMORY PER ITERATION 

;» OF INTERRUPTS PER ITERATION 

?MODULE IDENTIFICATION NUMBER=5 



READ BUFFER VIRTUAL ADDRESS 
RgAD BUFFER PHYSICAL ADDRESS 
READ BUFFER EA BITS 
SIZE OF THE READ BUFFER 
WRITE BUFFER PHYSICAL ADDRESS 
WRITE BUFFER EA BITS 
WRITE BUFFER SIZE REQUESTED 
WRITE BUFFER SIZE AVAILABLE 
CDATA/OATCK ERROR COUNT 
CDATA/DATCK WORD COUNT 
RESERVED FOR FUTURE USE 
MODULE STACK STARTS HERE. 



************************************* 



SEQ 0005 
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mm 

177620 



250 
244 
244 




2$: 



RESTRTi 
RSTRTl: 



CLR 
MOV 
MOV 
MOV 
CLP 

CkS 
MOV 

MOV 
MOV 

gb? 

CMPB 
BNE 

MOV 
TSTB 

m 

DECP 

IV 

BITB 

BEQ 

MOV 

JSR 

MSGNS, 

MOV 
JSR 
JSR 

TST 

PEQ 

BR 

TST 

BNE 

BR 



002062 



1016 
2016 



000310 003315 
160000 001774 



CNT 

■fo24'.#WDFR 
,INTR 



«iDub00,DRVSFT 
iBITl,@541 




R2rDRYVE 
PC, DROP „ , 
BEGIN, DRP ;ASCll 

«-l,DRYVE 

PC/SETUP 

PC,REZET 

DVICE 

FINI 

RSTRTl 

CNT 

RSTRTl 

START 



GETPAS, BEGIN/ RBUFVA 

MOV rbuf|z,wcnt2 

NEG HCNT2 



JSR 



PC, BLOCK 



JDK ri,#Pi.uu^ 

GWBUF5, BEGIN 

MOV WPUFSZ/WCNTl 

NEG MCNTl 

MOV BLKl/RO 

JSR PC,CDNVRT 



JSR 
TST 

BEQ 

BIC 



ZERO END OF PASS TESTER 
yORDS TO MEM 
WORDS FROM MEM 
» OF INTERRUPTS/ITERATION 
CLEAR FLAGS AND SIDE INDICATOR 
CLEAR DATA LATE EROR COUNTER 
GET DRIVE INDICATOR,,^ 
ALSO SAVE IT IN^DRIVE_„„ 
INITIALIZE BLOCK COUNTER 



?S??i!!:HE''ffl^5 



_ _ ._ JHIFTED DRIVE « 
is'RK UNIT THE LOAD MEDIUM ? 
NO, CONTINUE 

LOAD UP Rl TO POINT TO DRIVE ttO 
IF RO EQUAL TO THEN 



ATE DRIVE POINTER 



TRV ftCATN 
?IF DRIVE NOT SELECTED TO BE TESTED THEN 

jELsPlOAD DRIVE ADDRESS TO BE DROPPED 
• rO DRQ" TT 
mIsSAGE call with common HEADER 

} INITIALIZE DRIVE COUNTER^^^ 

; GENERATE REGISTER^ADDRESSES ^„,„^^ 

} INITIALIZE RK REGS. AND ALL DRIVES 

} DROP THE MODULE ? 

J YES 



m 



/ 



THIS IS 
SUPPORT 



PC/DRVADR 

DVICE 

FINI 

»PIT3,FLAG 

STRT 

#160000, DSKADR 



FOR 
. , DTQ3 
♦■/ BUS SWITCH 

JGET PHYSICAL ADDRESS FROM 16-BIT RBUFVA 
SAVE READ BUFFER SIZE 
GET THE 2'S COMPLEMENT 

GET NEXT BLOCK NUMBER 
GET WRITE BUFFER INFORMATION 



SAVE WRITE BUFFER SIZE 
GST THE 2'S COMPLEMENT 
LOAD BLOCK « FOR CONVRT 
GENERATE 0I§K ADR. FROM BLOCK « 

GET A DRIVE ADDRESS 

ANY DRIVES LE^T ? 

NO/ GO DROP THE MODULE 

ALL DRIVES DONE ? 

YES, GO GET ANOTHER BLOCK 

CLE\r DRIVE ADDRESS 
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15: 



289 
290 



DRVSFT, DSKADR 
DSKADR, aPKDA 
IbITS/BRKDS 



BIS 

MOV 

BIT 

BEQ IS 

JSR PC, DROP 

MSGNS, BEGIN, DPP JASCII 

BR NEXT - 

BIT ftPIT6,flRKnS 

PNE 2$ 

JSR PC,NDTRDY 

BR STRT 

CLR TPYl 

CLRB TRY3 



J LOAD DRIVE ADDRSSS 

} LOAD DISK ADDRESS 

7 jiRITE PROTECTED ? 

} NO, CONTINUE 

; YES, DROP THE DRIVE 
5ESSAGE CALL WITH COMMON HEADER 

; GO ON TO NEXT DRIVE 

? DRIVE READY ? 

} YES, CONTINUE 

} NO, WAIT FOR READY 

} TRY AGAIN 

; ZERO RETRY COUNTERS 



RKAG C 
XRKAGC 



EC/Xll 
.Pll 



STEM EXERCISER MODULE 
2-0CT-79 12:07 



MACYll :iOA(1052) 12-0CT-78 I6;5t* PIGE « 



294 

295 



m 



318 



ill 
IP 



m 

338 
339 



000656' 
000662' 
000664' 

0Q0716' 



00 4S67 
000434 
132767 

mm 
mm 

004567 
000437 

umi- 



000212 

000004 

000004 
177775 

000210 

000234 

OOOO0O' 



000742' 
000746' 



105267 001614 

104413 000300' 
000674 

104410 000000' 



00(1754' 
000760' 
000766' 

mm- 

001022' 



001036* 
00104"- 



'40 

U046 

■'15' 



mu' 



001333 

mu 

105267 

\m 

000411 

\mv, 

001330 
104403 

032767 

mm 



mm 

000000' 



003073 
000003 



mm 

OOODOO' 
000001 
000264 



GO: JSR R5£WRITE ; WRITE SOME DATA 

BR RETRYl ? I"- SRRORS, TRY TT AGAIN 

003203 BITP «PIT2/FLAG ? DID THE DISK CIVERFLOb ? 

003173 l!?P P!t2.FLAG ; ?§§,^?!!iI?"lHE OVERFLOW FLAG 

P01666 MOV 3-3,BLKl } RSSET THE BLOCK NUMBER 

RP STRT J START OVER AT BEGINNING 0'' DISK 

GOA: JSR RStWRITCK ? y<RITE-CHFCK THE DATA 

BR RETRY2 } IF ERRORS, TRY AGAIN 

GOR! JSR R5/READ ? READ THE DATA WRITTEN 

BR RETRY3 » I^ ERRORS, TRY AGAIN 

000126' CDATAS/BEGIN,RBUFPA ; REQUEST FOR MONITOR TO CHECf DATA 

.♦2 ? IF ERROR/ CONTINUE 

INC CNT ? COUNT A CYCLE 
PISSS 

ENDITS/BEGIN ySlGNAL FND OF IFERATTON. 

JMONITOR SHALL TEST END OF PASS 
PR NEXT 

FINIS 

FNDS, BEGIN ? DROP THE MODULE 

J , 

retryl: incb tryl ? count the retrys 

003110 cmpb »3/trvl ? limit exceeded ? 

bne go i no, go try it again 

004026' msgns, begin, exceol jascii message call ^ith common hfadfp 

br nexta ; go on to next drive 

6etry2: Tncb try2 7 count retry? 

003065 CMPB tf3,TRY2 ? LIMIT EXCEEDED •> 

BNF GOA ? NO, TRY AGAIN 

004034' MSGNS/BEGTN,EXCED2 J ASCII MESSAGE CALL WITH COMMON HEADER 

BR NEXTA ? GO ON TO NEXT DRIVE 

6eTRY3: INCP TRY3 ; COUNT RETRYS 

003042 CMPB »3,TRY3 ; LIMIT EXCEEDED ? 

BNF (tOB ; NO, GO TRY AGAIN 

004042' MSGNS, BEGIN, EXCED3 JASCII MESSAGE CALL WITH COMMON HEADER 

176742 NEXTA: BIT <fBlT07ipl '; DROP THE DRIVE ' 

BEQ 1$ ; NO, SKIP TO NEXT DRIVE 

JSR PC, DROP 5 YES, OROP OFFENDING DRIVE 
004050' . MSGNS, BEGIN, DRP JASCII MESSAGE CALL *iITH COMMON HEADER 

1?: JMP NEXT ; GO ON TO NEXT DRIVE 
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343 
344 

m 

347 

m 

350 
351 
352 
353 
354 
355 



359 

m 

362 
363 
364 
365 
366 

III 



III 



m 
pi 

379 

hi 

382 
383 



386 
387 
388 
389 
390 



\m 

m 

\m 

ili 

1212 
- J2?0 

mm 
' m 



mm 



270 

001272 
001300 

001322 
001326 
001326 

001334' 

mm 



012767 000503 001456 WRITE: 

"M m\\ mil 



0462 
U12767 
016777 
016777 



000507 001424 

001446 002462 

176766 002456 

176762 001404 



.i-us mm 

176726 302424 
176722 001352 



nn 



000001 002402 
001254 

boofoo hllse 



002350 
032336 



001326' 176510 
001260 002322 



000304 000000' 001334' 

004567 000512 
000205 

mui 



MOV 
MOV 

MOV 

MOV 

BR 

MOV 

MOV 

MOV 

MOV 

BR 

MOV 

MOV 

MOV 

MOV 

PR 

MOV 
JSR 
MOV 
PIT 
HNE 
RTS 
MOV 
JSR 
MOV 
JSR 
PTS 

MOV 
MOV 

EXITSi 



RKll DISK DRIVERS 



#503, 

WCNTl 

WPUFP 

WPUFE 

GOGO 

fl507, 

WCNTl 

WBUFP 

WBUFE 

wcnt5 

RBUFP 
RPUFE 
GOGO 



FUNC 
,'aRKWC 
A/BRKPA 
A,XMEM 

FUNC 
rPRKWC 
A,PRKBA 
A,XMEM 

FUNC 
,<aRKWC 
A,flRKBA 
A,XMEM 



DRV 
|BI 

R' 
1*15 

w 

R5 



'JRKCS 
WAITl 
SFT,fitRKDA 
T6,aRKDS 



,0PKCS 
WAIT 



lll,aRKCS 
PC, WAIT! 



NTPUPT,(aVECTOR 
SKADR,fflRKDA 



FUNC>f9R 
BEGIN 



LOAD WRITE FUNCTION 

LOAD WORD COUNT 

LOAD BUFFER ADDRESS 

LOAD EXTENDED MgMORY BITS 

CONTINUE 

LOAD WRITF-CHRCK FUNCTION 

LOAD -iORO COUNT 

LOAD BUFFER ADDRESS 

LOAD EXTENDED MEMORY BITS 

CONTINUE 

LOAD READ FUNCTION 

LOAD WORD COUNT 

LOAD "UPFEH ADDRESS 

LOAD EXTENDED MEMORY PITS 

rONTINilE 

ISSUE A CONTROL RESET 

GO WAIT FOR CONTROLLER READY 

RELOAD THE DRIVE ADDRESS 

OPIVE READY ? 

YES, CONTINUE 

NO, ABORT DRIVE RESET 

ISSUE A DRIVE RESET 

GIVE IT TIME TO COMPLETE 

ISSUE ANOTHER CONTROLLER RESET 

WAIT FOR CONTROLLER READY 

RETURN 

SET INTERUPT ENTRY POINTER 
LOAD THE DISK ADDRESS 



JEXIT TO MHNITOR. MODULE WAIT FUR INTERRUPT, 



hpQS, BEGIN, IS 



JSR 
RTS 
TST 

RTS 



R5, ERRORS 
R5 



; QUEUE UP TO CONTINUE AT !<: AND RT I 



} GO CHECK FOR ERRORS 

; ERRORS DETECTED, RETURN 

} NO ERRORS, SKIP RETRY 

J RETURN OK 
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104420, 000000' 002572' 



nm mnt 




mm 



152767 

0002"- 



176404 
176376 



000004 002315 



DROP! 

15! 

2$S 



IS! 

; 



4?! 

5S! 
6S! 
7$: 



MOV 

MQV 

BEQ 

ASL R 

DEC R! 



dHve,r 



BIC Rl,DVICE 

•**»*#*****«****«*****■ 

QT0AS,BEGI! 
. ********* 
RTS PC 



QTOAS, BEGIN, DRYVE,ADR1 

************** 



? INITIALIZE DROP PICKER 

J GET THE DRIVE NUMBER 

; IF DRIVE GO DROP IT 

} NO, AIM AT THE NEXT DRIVE 

? IS THIS THE ONE ? 

r***************************«*«**« 

?CONVERT DRYVE TO ASCII AND 
JSTORE AT ADRl 

t******************************** 



r******* 



ADD 
CMP 
BPL 
CLP 
MOV 
RTS 



MOV 
MOV 
CLR 
CMP 
BGE 
SUB 
MOV 
BIT 
PNE 
ASP 
SUB 
ADD 
DEC 
BGT 
TST 
BMI 
TST 
PMI 

TST 

BPL 

CMP 

BLT 

TST 

RTS 

BISB 

RTS 



mv.w 



BLKlePO 
#2399. /Rl 

p399.,R0 

#2400. ePO 

5256,,PSIZ 

|BITii,ORKDS 

RO,Rl 
BS1Z,R2 



BUFSZ 



WBUFSZ 
R2,WBUFSZ 

|RIT2,FLAG 
RS 



STEP TO NEXT BLOCK 

BLOCK LIMIT REACHED ? 

NO, CONTINUE 

YES, RESET BLOCK * 

READ WHERE WRITE 

RETURN 



SAVE THE CURRENT BLOCK NUMBER 

LOAD MAX. NUMBER OF BLOCK PER SIDE 

ZERO REG. 2 

IS SIDE DONE •> 

NO, CONTINUE 

VSS, NORMALIZE BLOCK » FOP SIDE 1 

YES, CONTINUE 

NO, SET TO 128 — LO DENSITY 

GET 1 OF BLOCKS LEFT ON DISK 

GET TOTAL NUMBER OF WORDS LEFT 

ALL BLOCKS ADDED IN ? 

NO, KEEP ADDING 

IS ft OF WORDS LEFT ON DISK NEG. ? 

YES 

IS TRANSFER SIZE NEG. ? 

YES 

NO, GO CQWPARE 

I<? TRANSFER SIZE POS. ? 

YES 

WAS THERE ENOUGH ROOM FOR THE TRANSFER ? 

NO, RETURN OK 

YES. MUST BE A REAL ERROR 

RETURN, ERROR 

SET OVERFLOW FLAG 

RETURN OK 
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001632 
001624 



000762 



mm 

000730 
000716 



000672 
002165 



176106 
176102 



INC 

ADD 

BICP 

CMP 

BFQ 

ASR 

BCC 

RTS 

BISB 

MOV 

MOV 

MOV 

RTS 



NOTRDY: MOV 
MOV 
MOV 

1?! JSP 
BITP 
PNE 
MOV 
PIT 
BNE 
JSP 
BR 
RTS 



2$: 



ERSUB2: MOV 
MOV 
MOV 
MOV 
TST 
TST 



ERSUBl: 



MOV 
MOV 
RTS 



DRYVE 

*BIT|3,DRVSFT 
#PIT3,FLAG 
#8., DRYVE 

DRIVE 

DRVADR 

PC 

#160000, DRVSFT 
DVICE, DRIVE 
PC 



#166o06,DPVSFT 
DVICE, DRIVE 
PC,DRVADP 
■PIT3,FLAG 



I 



DRVSPTeflRKDA 
#BIT6,flRKDS 

PC, WAIT 



rLsbCdr 

-(R2),AWAS 
R2,WASA0P 



IrIU 



RKCS,CSRA 

'aPKCS,ACSR 

PC 



i COUNT A DRIVE 

; DRIVE COUNT LINED UP WITH RKDA 

; CLEAR END OF DRIVES FLAG 

? ALL DRIVES CHECKED ? 

? YES, GO FLAG END OF DRIVES 

? NO, IS NEXT DRIVE CHOSEN ? 

} NO, GO TRY ANOTHER DRIVE 

? RETURN 

} SET END OF DRIVES FLAG 

; RESET DRIVE COUNTER 

} ZERO THE SHIFTED DRIVE » 

} RESTORE CHOSEN DRIVES 

; RETURN 



J START WITH FIRST DRIVE 

7 RESET DRIVE SELECT 

} GET A DRIVE ADDRESS 

} ALL DRIVES CHECKED ? 

} YES, RETURN 

? NO, LOAD NEXT DRIVE ADDRESS 

} IS THIS DRIVE READY ? 

J YES, CONTIN'tE 

} NO, WATT FOR IT 

} GO CHECK REST OF DRIVES 

J RETURN 



LOAD THE DATA 
L0-~ 



LOAD ADDRESS OF DATA WRITTEN 

; LOAD THE DATA 

? LOAD ADDRESS OF DATA READ 

? RESET REG. 1 

J RESET PEG. 2 

} LOAD ADR. OF CURRENT CSR 

; LOAD CONTENTS OF CURRENT CSR 

i RETURN 



RK&G DEC/Xll 
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493 
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m 



^3§ 

m 



002002^ 012767 
OQlilo' 104407 



n 8 



SOS 
509 

IH 

515 
516 



520 

52' 

5| 

52 

52 

52 

52 



533 
534 

ill 



519 
540 
541 
542 
543 



2042- 
2050' 



077777 001604 
OQOQOQ' 



002052- 
002056" 

i74' 



517 002n2' 

It? mir- 

"1134" 
!}42' 
!144' 



00536' 

194403 
900207 

004767 
032777 

nm 

mm 

0gi013 
*=«1403 



001560 
00' 



hlUV- 



177706 

040000 001536 

000003 001524 

040000 001510 

177320 

COIOOO 001472 

000420 

000004 175654 

000000' 004060' 



lil^jgijE? mnr 



002164' 104405 



531 002172 

532 002176 
""" 002200 

''5I2OO 
002206 



00 4567 
000411 



000000' 003616' 
177014 



002214' 104406 000000' 003616' 



002230 
002232 



mm 

005725 
000205 



WAITS 

1§; 



2S: 

Irrorsi 



MOV 



#77777^CLff 



BREAKS, BEGIN 

BREAKS, BEGIN 

BIT #BIT6,(aRKDS 

BNE 2S 

DEC CLK 

53r PC, drop 

HSGNS, BEGIN, DRP ?ASC 
PTS PC 



JSR 
BIT 
BNE 
BIT 
BNE 
TST 
RTS 
BIT 
BEQ 
JSR 

BIT 
BEQ 
INC 
BIT 
BNE 
HSGNS 

MSGNS 
• *** 
HRDER 
JSP 



PC,ERSUB1 
#BIT14,aRKCS 

|5,aRKER 

|BITl4,aRKER 

R5,R00M 

5S 

«&IT9,flRKER 

2S 

DLTCNT 

JBIT2,SR1 

, BEGIN, DLTERR 

,PEGIN,HARn 
ERRTYP 

$£BEGIN, TABLE 
*%********* ***** 

P5, CLEAR 
4$ 

,BEGIN,SOFT 

«i, ERRTYP 
ft*************** 



SET THE TIMER 



?THEN CONTINUE AT NEXT INSTRUCTION. 

; DRIVE READY ? 

} YSS, RETURN 

J NO, WAIT SOME MORE ? 

I tlMfe-OUT/ DROP THE DRIVE 
11 MESSAGE CALL tlUH COMMON HEADER 
} RETURN 

""? LOAD ERROR INFORMATION 

} HARD ERROR ? 

; YES, GO REPORT 

? SOFT ERROR "> 

? YSS, GO REPORT 

; NO, SKIP RETRY 

} RETURN OK 

; DISK OVERFLOW ? 

i NO, CONTINUE 

I YES, IS IT A REAL ERROR ? 

;DAt1 late ERROR? 

?N0 

MNCREMSNT ERROR COUNTER 

JTYPE OUT ERROR*? 

?N0 

?ASCII MESSAGE CALL WITH COMMON HEADER 

;ASCII MESSAGE CALL WITH COMMON HEADER 
**************************************** 



************* 



MSGNS 
MOV 



.*****C*****Cft****** 

RTS 

JSR 

TST 

RTS 



*************************j 
GO CLEAR OUT ERRORS 
RETURN 

ASCII MESSAGE CALL WITH COMMON HEADER 

DATA ERROR 
ft************************************ 



R5 

R5, CLEAR 



********************************* 
RETURN, ERRORS 
CLEAR OUT ERRORS 
SKIP RETRY 
RETURN OK 



******* 
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'HIP 



547 
548 
549 



552 
553 



556 
557 
§58 
§59 
560 
561 

III 

565 

III 

568 
569 



PI 



57, 
580 
581 
582 

565 
586 
587 
588 
589 
590 



002234' 

mm- 

002246' 
002252' 

OOI26O' 

2262' 

2266' 

2270' 

Jh^' 

02276' 

02302' 

.&2304' 

002310' 

002312' 



10D67 

Im 

00572 

01006. 

005720 
010067 

imi 

502332' 000207 






PI mil 

573 - — 

m 



Q£. 'J 

85 



4 

002342 
892346 
502352 

mil 

002376 
002400 

"m 

im 

urn 

9Q2426 
002430 
(^02434 



060300 
005201 

nm 
mh 
mm 

003375 



175546 
501352 

001346 

001342 

001336 

001332 

001326 

001322 

001316 



001532 
177764 

000020 

173240 



001506 



00154 

01160 000146 



MOV 
MOV 
TST 
MOV 
TST 
MOV 
TST 
MOV 
TST 
MOV 
TST 
MOV 
TST 
MOV 
TST 
MOV 

MOV 
MOV 
MOVB 



C0NVRT5 CLR 
CLRB 
MOV 
MOV 
CMP 
BGE 
BTSB 
ADD 

1$: CMP 
BGE 
ADD 
INC 
BR 
MOV 
BISB 
MOV 
ASL 
DEC 
BGT 
BIS 
RTS 



2$: 



3S: 



ADDR,PO 
R'),RKDS 
(R0) + 
*0,RKER 
RO) 



; GET DEVICE ADDRESS 

J GENERATE CONTROLLER REGS. 



m 



KBA 



RO,PKCS 

RO,RKWC 
(R0) + 
Rf^^RKB 

RCeRKDA 

£Ro) + 

R0,RKMR 
RO,RKDB 
VECTOR, PO 



Rl 

SIDE 

»-12 



R3 
RC 



P4,R0 

R3,R0 
Rl 

rLdskadr 
side,dskadr 

R2 

Rl,nSKADR 
PC 



GET TME VECTOR ADDRESS 
SET POINTER JUST IN CASE 
SET PRIORITY 



ZERO REG. I 

ZERO THE SIDE INDICATOR 

LOAD REG. 3 

LOAD REG. 4 

IS BLOCK ON SIDE -> 

YES, CONTINUE 

NO, FLIP TO SIDE 

NORMALISE BLOCK ' 



1 

I* FOR SIDE 1 



GO TRY AGAIN 

LOAD THE SECTOR ADDRESS 

LOAD THE SIDE ADDRESS 

SET UP POR SHIFT 

LINE UP CVL. ADR. WITH DSifADR 

DONE ? 

NO, GO SHIFT AGAIN 

VFS, LOAD THE CYLINDER ADDRESS 

RETURN 



RKAG 01 
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ill 
m 

597 



ill 



621 

III 



m 

632 
633 



l^ 

641 
642 
643 
644 
645 
646 
647 



002436' 
002444' 

miv- 

002460' 

nmr- 

002474' 
002476' 



32767 

m 



000010 
176516 



IP §pi8i-?jpf? mm """^ 

th nmi-mm mm- 

610 002524; 005367 001064 

612 Ooiisi' olill^ 000003 175346 



636J 



0036> 
00362 

mm 
mm 

003636 



0000 



REZET: 
1$: 



2$: 
? 



IS: 



002540' 104405 000000' 003616' 



mm 



2s: 
} 

DLTCNT: 

cnt: 

FUNC: 
XMEMJ 

DRIVE: 

DRYVE: 

DRVSFT: 

BLKl: 

BLK2! 

BSIZ: 

TBUF: 

wcntI: 

WCNT2: 

BUFLEN: 

BUFIN: 

clk: 

TABLE: 

RfCDS: 

RKER: 

RKCS! 

RKWC: 

RKBA: 

RKDA: 

RKMR: 

rkdb: 



JSR 

JSR 

JSR 

BITB 

BNE 

JSR 



#BIT3,FLAG 
R5, CLEAR 
P? 



EXECUTE COMTROLLER RESET 

GO WAIT FOR CONTROLLER READY 



} 
} 


J 

; KEEP GOING 
J RETURN 



.„KE SURE ALL CHO^ 
G6T a DRIVE ADDRE§ 
ALL DRIVES DONE ? 



;N DRIVES ARE READY 



YES, RETURN 

iiSOE_DRIVE RESET AND CONTROLLER CLEAR 



#77777, CLK 

Srkcs 
beIp 



MOV 
TSTB 

BREAKS 

BREAKS, BEGIN 
DEC CLK 

MOV ILeRRTYP 

JMP FINI 
RTS PC 



? SET THE TIMER 

? CONTROLLER READY ? 

? YES, CONTINUE 

?TEMPORARY RETURN TO MONITOR.,.. 

?THEN CONTINUE AT NEXT INSTRuSf! 

; WAIT SOME MORE ? 

! m- 



rioN. 



; CONTROLLER NOT READY 
^A SSHfggtLER NOT READY 



. GO DROP THE MODULE 
} READY, RETURN 



*********** 



256. 
.BLKW 



RKAG DEC/Kli SYSTEM EXE 
XRKAGO.Pll 12-OCT-78 



MES2: 

MES4: 
MES5: 
MES6: 

MES7: 

mess: 
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MSSl: .ASCIZ ' HARD FRROR' 



SEQ 0015 



.ASCIZ 



SOFT ERROR' 



.ASCIZ ' DRIVE ' 
.ASCIZ ' DROPPEDf 
.ASCIZ • RETRY EXCEEOEOI' 



.ASCIZ 
.ASCIZ 



WRITE' 
WRITE-CHECK' 



M|S9: .ASCIZ ' READ' 

MESIO: .ASCIZ 'DATA LATE ERROR% 



.EVEN 
177777 



177777 

MES8 

mil 

MES9 
MES6 

NUMB 
MESS 

\U\V 

177777 
.BLKB 5 
.BYTE 

:g??i 8 

.BYTE 

.BYTE 

.BYTE 
.EVEN 



ADRl: 

numb: 

SIDE: 
FLAG: 

TaY3: 



ill 



RKkG DEC/Xll SYSTEM EX|RCIS|R 



MACVll 30&(105 
CROSS REFERENC 



ACSR 
^DDR 
aDOR22= 



BITO 

um 
um 

BIT15 
BIT2 

ml 

BITS 



um 

lOGO 

tm 
ill 



4fl9* 
546 

\m 

m- 
m 

234 



m 



290 
285 



m 



515 

m 

366 



266 
499 



444 
458 



) 12-0CT-7 
TABLE 



2«3 
505 



5?? 

500 



.^ 16S59 PAGE 13 
U§ER SYMBOLS 



30 4 


310 


315 


323 


329 


335 


340 


379 


524 


526 


529 


534 


537 


608 


609 


614 



BLOCK 

BRPKS = 

BRl 

BR2 

BSIZ 

BTODS = 

BUFIN 

BUFLEN 

CDaTAS= 

CDERCf 

CDHDCT 

CLEAR 

CLK 

CNT 

COHFIG 



III!" 
'mm 

'm 

556R 
556R 

lOOR 



498 
565 

428* 

636» 

304 



298* 

499 

430 



31 54 



540 

605* 

308* 



410* 

608 

631« 



im 



411 

609 



571» 
488* 



UV 



DRP 

DRVADR 

ORVSFT 

DRYVE 

DSKADR 

DVICE 



Ellis 



524 



521* 
688# 

m* 

283 
449» 

278* 
230 



m- 


mt 


340 


505 




469 


ill* 


450* 


279 


376 


245 


254 



684» 

111* 

584* 
273 



467* 
449* 
585* 
399* 



m w 



590* 
461 



624» 
468 



/Xll SYSTEM 
11 12-OCT 



EXERCISER MODULE 
■78 12:07 



DVIDl 
ENDIT$= 
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CROSS REFERENCE TABLE — USER SYMBOLS 



612* 



m 

357* 



377* 



451* 
378 



458* 
622» 



328 
361 



267 

226* 

671 



676 

m 

681 



'* 



F,ir-~ 



OTOA$ = 104420 



284 
330 

tm 
m 

403 



312 

337# 

595 



165 



323 
341 



166 

198 



167 
200 



184 
201 



195 
202 



186 
235 



524 



lU 



188 
208 



199 
209 



m 



191 
212 



RKAG OEC/Xll SYSTEM E] 
XRK&GO.PU I2-OCT-* 



rim 



CROSS R 



miiv 



12-QCT-78 16:58 PRGE 20 
ABLE — USER SYMBOLS 



RETRYl 
RETRY2 



mm 
nhil 

000130R 
000i26R 



mm 
mm 

0Q3626R 
0P622R 
gO3630R 



3632R 



m 



360 
304 

2571 



mi 
ml 

354 

369 
365* 
646« 
285 
515 

W 

517 

258 
482* 
535* 
572* 

537 

673S 



354* 359* 555* 643 
369* 371* 378* 488 
365* 376* 472* 557 



m 



366 
519 

358* 
260it 
577* 



489 
644« 



426 
549* 



473 
640lt 



642# 



69311 



509 

547* 



551* 
639» 



RKAG DEC/Xll SYSTEM 
XRK&GO.Pll 12-00 



START 
STAT 




m EXERCISER MODULE 
CT-78 12:07 



70 
69» 

m 
m 
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CROSS REFERENCE TABLE — USER SYMBOLS 



MBUFS 

WCNTl 

VICNT2 

MDF- 

WDT- 

WRITCK 

WRIT! 

XFLAG 

XMEM 



179f 

529 

632» 

ml 
M- 

364 

mi 

208* 

m 

267* 
262* 

im 

300 

m> 

350* 
305 



537 



320* 
112* 

Iw 

372 
48 4* 
350 
349 

267 
268* 



352« 
347» 



355* 
636# 



321 

m' 

5§| 

496# 

594 

355 
354 

435 

348 
358 



360 
670 



638# 



438 

353 
634» 



377 
690 # 



440 
633# 



699I 



»==• 88^}8S 38? 



ERRORS DETECTED:^^0 ^^^^^ 
DEFAULT GLORALS GENERATED: 






M=DDXCOM/XRKAG0 



If 



f 



